<p class="Head1"><help:paragraphinfo state="U" number="1"/><help:key-word value="Cos; function" tag="kw66601_1"/><help:link Id="66601">Cos Function [Runtime]</help:link></p>
<p class="Paragraph"><help:paragraphinfo state="U" number="2"/>Calculates the cosine of an angle. The angle is specified in radians. The result lies between -1 and 1.</p>
<p class="Paragraph"><help:paragraphinfo state="U" number="3" xmlns:help="http://openoffice.org/2000/help"/>Using the angle Alpha, the Cos-Function calculates the ratio of the length of the side that is adjacent to the angle, divided by the length of the hypotenuse in a right-angled triangle.</p>
<p class="Paragraph"><help:paragraphinfo state="U" number="10" xmlns:help="http://openoffice.org/2000/help"/><span class="T1">Number:</span> Numeric expression that specifies an angle in radians that you want to calculate the cosine for.</p>
<p class="Paragraph"><help:paragraphinfo state="U" number="11" xmlns:help="http://openoffice.org/2000/help"/>To convert degrees to radians, multiply degrees by pi/180. To convert radians to degrees, multiply radians by 180/pi.</p>
<p class="Paragraph"><help:paragraphinfo state="U" number="14" xmlns:help="http://openoffice.org/2000/help"/>Pi is here the fixed circle constant with the rounded value 3.14159...</p>
<p class="PropText"><help:paragraphinfo state="U" number="16" xmlns:help="http://openoffice.org/2000/help"/>REM The following example allows for a right-angled triangle the input of</p>
<p class="PropText"><help:paragraphinfo state="U" number="17" xmlns:help="http://openoffice.org/2000/help"/>REM secant and angle (in degrees) and calculates the length of the hypotenuse:</p>
<p class="PropText"><help:paragraphinfo state="U" number="19" xmlns:help="http://openoffice.org/2000/help"/>REM rounded Pi = 3.14159</p>
<p class="PropText"><help:paragraphinfo state="U" number="20" xmlns:help="http://openoffice.org/2000/help"/>Dim d1 as Double, dAngle as Double</p>
<p class="PropText"><help:paragraphinfo state="U" number="21" xmlns:help="http://openoffice.org/2000/help"/>d1 = InputBox$ (""Enter the length of the adjacent side: ","Adjacent")</p>
<p class="PropText"><help:paragraphinfo state="U" number="22" xmlns:help="http://openoffice.org/2000/help"/>dAngle = InputBox$ ("Enter the angle Alpha (in degrees): ","Alpha")</p>
<p class="PropText"><help:paragraphinfo state="U" number="23" xmlns:help="http://openoffice.org/2000/help"/>Print "The length of the hypothenuse is"; (d1 / cos (dAngle * Pi / 180))</p>